home *** CD-ROM | disk | FTP | other *** search
/ X'Tasies 5 / X'Tasies 5 - Disc 1.iso / mac / Main.Dir / 00070_Volume 0.ls < prev    next >
Encoding:
Text File  |  1996-09-02  |  588 b   |  27 lines
  1. on mouseDown
  2.   repeat with i = 7 down to 0
  3.     set the visible of sprite (24 + i) to 1
  4.   end repeat
  5.   set the visible of sprite 24 to 0
  6.   updateStage()
  7.   repeat while the mouseDown = 1
  8.     if rollOver(32) = 1 then
  9.       set the visible of sprite 24 to 0
  10.       updateStage()
  11.     end if
  12.   end repeat
  13. end
  14.  
  15. on mouseUp
  16.   if rollOver(32) = 1 then
  17.     set the soundLevel to 0
  18.   else
  19.     repeat with i = 7 down to 0
  20.       set the visible of sprite (24 + i) to 1
  21.     end repeat
  22.     repeat with i = the soundLevel down to 0
  23.       set the visible of sprite (24 + i) to 0
  24.     end repeat
  25.   end if
  26. end
  27.